﻿using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.IO;
using System.Collections;
using CSP.Common.Tools;
using System.Text.RegularExpressions;
using System.Globalization;
using CSP.Common.Web;
using CSP.Common.Factories;
using CSP.Common.Providers;

namespace CSP.Web.UserControls
{
    public partial class CSPEditer : CSPUserControlBase
    {
        /// <summary>
        /// 临时文件夹路径
        /// </summary>
        private const string TEM_FILEPATH = "/Upload/Tmp/";

        /// <summary>
        /// 发布文件夹路径
        /// </summary>
        private const string RELEASE_FILEPATH = "/Upload/";


        private HttpContext _context;
        private string _currentPagePath;

        /// <summary>
        /// 是否将图片从临时文件夹中提取到发布文件夹中，默认False
        /// </summary>
        private bool _isReleaseImg = false;

        public bool IsReusable
        {
            get
            {
                return true;
            }
        }

        /// <summary>
        /// 当前承载页面的路径
        /// </summary>
        public string CurrentPagePath
        {
            get
            {
                return _currentPagePath;
            }
        }

        public string Text
        {
            get
            {
                //如果图片已经转移到发布文件夹中
                if (_isReleaseImg)
                {
                    return this.E_CSPEditor.Value.Replace(TEM_FILEPATH + "image", "/Upload");
                }
                else
                {
                    return this.E_CSPEditor.Value;
                }
            }
            set
            {
                this.E_CSPEditor.Value = value;
            }
        }

        public string ImageURL
        {
            get
            {
                //如果图片已经转移到发布文件夹中
                if (_isReleaseImg)
                {
                    return this.Txt_ImgURL_Insert.Value.Replace(TEM_FILEPATH + "image", "/Upload");
                }
                else
                {
                    return this.Txt_ImgURL_Insert.Value;
                }
            }
        }

        /// <summary>
        /// 当程序未初始化控件时加载
        /// </summary>
        /// <param name="e"></param>
        protected override void OnInit(EventArgs e)
        {
            base.OnInit(e);

            _currentPagePath = this.Page.Request.Path;
            if (this.Page.Request["Editor_Upload"] != null)
            {
                Upload_Request(this.Context);
            }

            if (this.Page.Request["Editor_FileManager"] != null)
            {
                File_Manager_Request(this.Context);
            }
        }

        protected void Page_Load(object sender, EventArgs e)
        {

        }

        /// <summary>
        /// 将图片从临时文件夹中提取到发布文件夹中
        /// </summary>
        public void ReleaseImg()
        {
            string imgReleasingURl = this.Txt_ImgURL_Insert.Value;

            if (!string.IsNullOrWhiteSpace(imgReleasingURl))
            {
                string[] imgURLs = imgReleasingURl.Split('|');
                string imgURL = "";
                for (int i = 0; i < imgURLs.Length; i++)
                {
                    imgURL = imgURLs[i];
                    MoveFile(imgURL);
                }
            }

            _isReleaseImg = true;
        }

        /// <summary>
        /// 移动文件
        /// </summary>
        /// <param name="url"></param>
        private void MoveFile(string url)
        {
            string domainURL = AppDomain.CurrentDomain.SetupInformation.ApplicationBase;
            string fileNames = "/" + @url.Substring(1);
            url = domainURL + @url.Substring(1);
            string[] partPathes = fileNames.Replace(TEM_FILEPATH + "image/", "").Split('/');

            string directory = domainURL + @RELEASE_FILEPATH.Substring(1) + partPathes[0];
            if (!Directory.Exists(directory))
            {
                Directory.CreateDirectory(directory);
            }
            string releaseURL = directory + "/" + partPathes[1];
            File.Move(url, releaseURL);
        }


        #region upload_json

        public void Upload_Request(HttpContext context)
        {
            String aspxUrl = context.Request.Path.Substring(0, context.Request.Path.LastIndexOf("/") + 1);

            //文件保存目录路径
            String savePath = "~" + TEM_FILEPATH;

            //文件保存目录URL
            String saveUrl = TEM_FILEPATH;


            //定义允许上传的文件扩展名
            Hashtable extTable = new Hashtable();
            extTable.Add("image", "gif,jpg,jpeg,png,bmp");
            extTable.Add("flash", "swf,flv");
            extTable.Add("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
            extTable.Add("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2");

            //最大文件大小
            int maxSize = 1000000;
            this._context = context;

            HttpPostedFile imgFile = context.Request.Files["imgFile"];
            if (imgFile == null)
            {
                showError("请选择文件。");
            }

            String dirPath = context.Server.MapPath(savePath);
            if (!Directory.Exists(dirPath))
            {
                showError("上传目录不存在。");
            }

            String dirName = context.Request.QueryString["dir"];
            if (String.IsNullOrEmpty(dirName))
            {
                dirName = "image";
            }
            if (!extTable.ContainsKey(dirName))
            {
                showError("目录名不正确。");
            }

            String fileName = imgFile.FileName;
            String fileExt = Path.GetExtension(fileName).ToLower();

            if (imgFile.InputStream == null || imgFile.InputStream.Length > maxSize)
            {
                showError("上传文件大小超过限制。");
            }

            if (String.IsNullOrEmpty(fileExt) || Array.IndexOf(((String)extTable[dirName]).Split(','), fileExt.Substring(1).ToLower()) == -1)
            {
                showError("上传文件扩展名是不允许的扩展名。\n只允许" + ((String)extTable[dirName]) + "格式。");
            }

            //创建文件夹
            dirPath += dirName + "/";
            savePath += dirName + "/";
            if (!Directory.Exists(dirPath))
            {
                Directory.CreateDirectory(dirPath);
            }
            //String ymd = DateTime.Now.ToString("yyyyMMdd", DateTimeFormatInfo.InvariantInfo);
            //dirPath += ymd + "/";
            //saveUrl += ymd + "/";
            //if (!Directory.Exists(dirPath))
            //{
            //    Directory.CreateDirectory(dirPath);
            //}

            //String newFileName = DateTime.Now.Year.ToString() + DateTime.Now.Month.ToString()
            //+ DateTime.Now.Day.ToString() + DateTime.Now.Hour.ToString()
            //+ DateTime.Now.Second.ToString() + DateTime.Now.Minute.ToString()
            //+ DateTime.Now.Millisecond.ToString() + fileExt;
            //String filePath = dirPath + newFileName;

            //imgFile.SaveAs(filePath);

            ImageProviderFactory factory = ImageProviderFactory.GetInstance();
            factory.LWidth = 600;
            factory.SavePath = savePath;
            factory.IsCreateImg = false;
            factory.IsDraw = false;
            String fileUrl = "";
            try
            {
                ImageProvider provider = factory.UploadForThumbnail(imgFile);
                fileUrl = provider.SavePath + provider.New_ImageName;
            }
            catch (Exception ex)
            {
                LoggerFactory.GetErrorLogger().Error("文件上传失败!", ex);
            }


            Hashtable hash = new Hashtable();
            hash["error"] = 0;
            hash["url"] = "/" + fileUrl;
            context.Response.AddHeader("Content-Type", "text/html; charset=UTF-8");
            context.Response.Write(CommonTool.SerializeObject(hash));
            context.Response.End();
        }

        private void showError(string message)
        {
            Hashtable hash = new Hashtable();
            hash["error"] = 1;
            hash["message"] = message;
            _context.Response.AddHeader("Content-Type", "text/html; charset=UTF-8");
            _context.Response.Write(CommonTool.SerializeObject(hash));
            _context.Response.End();
        }

        #endregion

        #region file_manager_json

        public void File_Manager_Request(HttpContext context)
        {
            String aspxUrl = context.Request.Path.Substring(0, context.Request.Path.LastIndexOf("/") + 1);

            //根目录路径，相对路径
            String rootPath = "~" + TEM_FILEPATH;
            //根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/
            String rootUrl = TEM_FILEPATH;
            //图片扩展名
            String fileTypes = "gif,jpg,jpeg,png,bmp";

            String currentPath = "";
            String currentUrl = "";
            String currentDirPath = "";
            String moveupDirPath = "";

            String dirPath = context.Server.MapPath(rootPath);
            String dirName = context.Request.QueryString["dir"];
            if (!String.IsNullOrEmpty(dirName))
            {
                if (Array.IndexOf("image,flash,media,file".Split(','), dirName) == -1)
                {
                    context.Response.Write("Invalid Directory name.");
                    context.Response.End();
                }
                dirPath += dirName + "/";
                rootUrl += dirName + "/";
                if (!Directory.Exists(dirPath))
                {
                    Directory.CreateDirectory(dirPath);
                }
            }

            //根据path参数，设置各路径和URL
            String path = context.Request.QueryString["path"];
            path = String.IsNullOrEmpty(path) ? "" : path;
            if (path == "")
            {
                currentPath = dirPath;
                currentUrl = rootUrl;
                currentDirPath = "";
                moveupDirPath = "";
            }
            else
            {
                currentPath = dirPath + path;
                currentUrl = rootUrl + path;
                currentDirPath = path;
                moveupDirPath = Regex.Replace(currentDirPath, @"(.*?)[^\/]+\/$", "$1");
            }

            //排序形式，name or size or type
            String order = context.Request.QueryString["order"];
            order = String.IsNullOrEmpty(order) ? "" : order.ToLower();

            //不允许使用..移动到上一级目录
            if (Regex.IsMatch(path, @"\.\."))
            {
                context.Response.Write("Access is not allowed.");
                context.Response.End();
            }
            //最后一个字符不是/
            if (path != "" && !path.EndsWith("/"))
            {
                context.Response.Write("Parameter is not valid.");
                context.Response.End();
            }
            //目录不存在或不是目录
            if (!Directory.Exists(currentPath))
            {
                context.Response.Write("Directory does not exist.");
                context.Response.End();
            }

            //遍历目录取得文件信息
            string[] dirList = Directory.GetDirectories(currentPath);
            string[] fileList = Directory.GetFiles(currentPath);

            switch (order)
            {
                case "size":
                    Array.Sort(dirList, new NameSorter());
                    Array.Sort(fileList, new SizeSorter());
                    break;
                case "type":
                    Array.Sort(dirList, new NameSorter());
                    Array.Sort(fileList, new TypeSorter());
                    break;
                case "name":
                default:
                    Array.Sort(dirList, new NameSorter());
                    Array.Sort(fileList, new NameSorter());
                    break;
            }

            Hashtable result = new Hashtable();
            result["moveup_dir_path"] = moveupDirPath;
            result["current_dir_path"] = currentDirPath;
            result["current_url"] = currentUrl;
            result["total_count"] = dirList.Length + fileList.Length;
            List<Hashtable> dirFileList = new List<Hashtable>();
            result["file_list"] = dirFileList;
            for (int i = 0; i < dirList.Length; i++)
            {
                DirectoryInfo dir = new DirectoryInfo(dirList[i]);
                Hashtable hash = new Hashtable();
                hash["is_dir"] = true;
                hash["has_file"] = (dir.GetFileSystemInfos().Length > 0);
                hash["filesize"] = 0;
                hash["is_photo"] = false;
                hash["filetype"] = "";
                hash["filename"] = dir.Name;
                hash["datetime"] = dir.LastWriteTime.ToString("yyyy-MM-dd HH:mm:ss");
                dirFileList.Add(hash);
            }
            for (int i = 0; i < fileList.Length; i++)
            {
                FileInfo file = new FileInfo(fileList[i]);
                Hashtable hash = new Hashtable();
                hash["is_dir"] = false;
                hash["has_file"] = false;
                hash["filesize"] = file.Length;
                hash["is_photo"] = (Array.IndexOf(fileTypes.Split(','), file.Extension.Substring(1).ToLower()) >= 0);
                hash["filetype"] = file.Extension.Substring(1);
                hash["filename"] = file.Name;
                hash["datetime"] = file.LastWriteTime.ToString("yyyy-MM-dd HH:mm:ss");
                dirFileList.Add(hash);
            }
            context.Response.AddHeader("Content-Type", "application/json; charset=UTF-8");
            context.Response.Write(CommonTool.SerializeObject(result));
            context.Response.End();
        }

        public class NameSorter : IComparer
        {
            public int Compare(object x, object y)
            {
                if (x == null && y == null)
                {
                    return 0;
                }
                if (x == null)
                {
                    return -1;
                }
                if (y == null)
                {
                    return 1;
                }
                FileInfo xInfo = new FileInfo(x.ToString());
                FileInfo yInfo = new FileInfo(y.ToString());

                return xInfo.FullName.CompareTo(yInfo.FullName);
            }
        }

        public class SizeSorter : IComparer
        {
            public int Compare(object x, object y)
            {
                if (x == null && y == null)
                {
                    return 0;
                }
                if (x == null)
                {
                    return -1;
                }
                if (y == null)
                {
                    return 1;
                }
                FileInfo xInfo = new FileInfo(x.ToString());
                FileInfo yInfo = new FileInfo(y.ToString());

                return xInfo.Length.CompareTo(yInfo.Length);
            }
        }

        public class TypeSorter : IComparer
        {
            public int Compare(object x, object y)
            {
                if (x == null && y == null)
                {
                    return 0;
                }
                if (x == null)
                {
                    return -1;
                }
                if (y == null)
                {
                    return 1;
                }
                FileInfo xInfo = new FileInfo(x.ToString());
                FileInfo yInfo = new FileInfo(y.ToString());

                return xInfo.Extension.CompareTo(yInfo.Extension);
            }
        }

        #endregion
    }
}